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éditorial 


La PC 1211 a 2 ans,,. En effet, c'est au cours de MICRO EXPO 1980 qu'était présentée 
pour la première fois œtte merveilleuse machine. 

2 ans, c'est l'âge d'un tout petit enfant ; mais, 2 ans dans le monde de l'électronique 
c’est parfois plus de tenps qu'il n'en faut pour voir apparaître puis disparaître un 
produit. Or, la PC 1211 est toujours là et mieux encore, elle fait, chaque jour de nou- 
veaux adeptes. 

A œla, une raison,,.*! Plus qu'une machine, la PC 1211 est avant tout une idée, l'idée 
du premier ORDINATEUR de POCHE, le ocnpagnon inséparable de la ferme et de 1* hernie de 
demain. 

Alors BON ANNIVERSAIRE. . , ! ! 

A part cela, quelques nouvelles en vrac, d'abord de SHARP et puis du CLUB, 

- MICRO EXPO : corme en 1980 et 1981, SHARP sera présent à œtte exposition (du. 15 au 

19 juin 1982 au Palais des Congrès à Paris) ; peut-être aurons nous le plaisir de vous 
y rencontrer, 

- ONZE, SHARP et LA PUCE INFORMATIQUE organisent un Grand Concours pour la Coupe du 
Monde de Football (un de plus ! CXii mais pour la première fois, la micro-informatique 
est utilisée carme aide à la décision dans un Concours de pronostics) , Fin du 
Concours : le 5 juin. Règlement dans le journal CNZE de mai et dans IA PUCE INFORMATIQUE, 

- Une grande carpagne destinée à pranouvoir la micro-informatique SHARP dans l'enseigne- 
ment a débuté le 15 mai et se terminera le 31 juillet 1982. Si vous êtes enseignants, 
élèves, profitez vite des prix SHARP. 

- Le CLUB a trouvé son ncm. Je vous laisse le plaisir de le découvrir dans les pages 
suivantes. En tout cas, avec un nom carme celui-là, pas de difficultés pour construire 
l'avenir. 

- Très important : le CLUB a l'intention d'aller un peu plus loin en organisant des 
rencontres régionales. Alors, les bonnes ânes, faites -vous connaître. 

- Vous constaterez que la rubrique MZ qui était apparue dans le n°2 n'est pas présente 
dans œ Bulletin. Raison : les aime zedophi les sont très bavards et nous avons dû 
séparer le Bulletin MZ du Bulletin PC. Mais, si vous voulez tout savoir sur la gamne 
SHARP, offrez-vous un MZ 80, vous serez inscrit dans les 2 CLUBS. 

Voilà en relisant œs quelques lignes, je m'aperçois qu'il y a de tout un peu et que cet 
éditorial est légèrement décousu. Le soleil et le ciel bleu doivent y être peur quelque 
chose. * 


D'ailleurs à œ propos 


A BIENTOT 


BONNES VACANTES ! 
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LE CLUB 


BONJOUR, 

Avant de vous donner quelques nouvelles du CLUB, nous tenons à vous 
signaler que les inscriptions sont définitives. Il vous est donc 
inutile de vous réinscrire tous les trimestres. 

Les coupons qui se trouvent dans les Bulletins sont destinés à vos 
amis pour qu'ils deviennent à leur tour de fidèles adeptes SHARP, 
ccmme certains d'entre vous le sont. 


Vous avez été nombreux à nous faire parvenir des noms pour le CLUB : 

- SHARPOPHILES - PHILOSHARPES - PEŒAIMEZEDISTES 

- LOGI SHARPIENS (NES) - SHARPINFO - LES ECHARPES 

- SHARPentiers - BONASHARP - SHARPOUNETS 

Finalement, c'est le ncm de SHARPentiers, cité plusieurs fois qui a été 
retenu. Alors, chers charpentiers, heu!! SHARPentiers, continuez à 
participer à la vie du CLUB car malgré tout, vous êtes peu nombreux à 
nous faire parvenir des prograirmes ou des astuces. 


Ce trimestre, les permanences téléphoniques seront réduites : il n'y 
en aura pas en juin et août. Alors, rendez-vous en juillet le 1er et 
le 3àne mercredi de 14 à 18 heures au 834 93 44 (Demandez le CLUB) . 


A la suite de nombreuses demandes, nous vous lançons un appel pour la 
mise en place de sous -clubs régionaux, qui permettraient ainsi la 
réunion périodique des adhérents du CLUB. Si certains d'entre vous sont 
intéressés et ont la possibilité de faire ces réunions, qu'ils nous le 
fassent savoir. 

Chers SHARPentiers , il est grand temps de construire votre CLUB. Les 
responsables des CLUBS régionaux seront les ambassadeurs du CLUB. 


LOGITHEQUE CLUB PCI 211 

MME MELLE MR 
Adresse 

Ville 

Désire recevoir le listing programme de : 

En échange, je vous fais parvenir listings de programme 

NB : N'oubliez pas 1' enveloppe timbrée. 


LE CLUB 


Et voici une nouvelle rubrique qui est destinée aux applications 
particulières que vous donnez à votre PC 1211 (ou votre PC 1500) . 

Nous allons voir quelques records que la PC 1211 se devait de battre. 


- Record de l'altitude : une PC 1211 se trouvait à bord de la navette 
spatiale lors du premier vol le 12 avril 1981. 

- Record de vitesse : une PC 1211 est entrée dans l'atmosphère à 
26 230 km/h après un vol de 54 heures et 20 minutes. 

- Record du froid : une PC 1211 participa à la Croisière des Glaces 1982 
et se rendit au Groenland. 

- Record de chaleur : la PC 1211 finit première entre les mains de Bernard 
GIRDUX en 1981 au rallye PARIS-DAKAR, après avoir traversée le SAHARA. 

- Record sportif : votre PC 1211 joue au tennis (TEN-ORD) , joue au GOLF 
(DATAGOLF) et au foot (Concours SHARP, CNZE, LA PUCE) . 


MEMBRES D'HONNEUR 


CLUB PC 1211 : Mr ZUMMER 

Mr GOURDON 

CLUB PC 1500 : Mr PERROT 

BRAVO ! ! ! ! ! 


Ecrivez-nous , téléphonez-nous, et à bientôt, chers SHARPen tiers . 







ASTUCES 


Nous vous rappelons que ce sont vos astuces qui doivent apparaître ici, alors 
ëcrivez-les nous. 

Tout d'abord, une mauvaise nouvelle mais qui mettra fin, je l'espêre,à 
toutes vos questions sur ces futures extensions sur la PC 1211, SHARP ne 
développera pas d'autres extensions pour cette dernière, La petite trappe 
qui se trouve derrière la CE 122 était prévue pour l'adjonction d'une 
imprimante 32 colonnes. Projet qui a été abandonné et développé pour la 
PC 1500, Alors, ne pensez plus aux extensions de RAM ou autre... 



Voici un truc pour faire passer la mémoire de ma PC 1211 de 1424 pas et 
178 mémoires à 1936 pas et 242 mémoires (sans toucher ou démonter les 
composants électroniques du PC). J'ai d'ailleurs maintenant l'affichage 
DBG et RAD en permance. C'est beaucoup grâce au hasard que j'ai obtenu 
cette augmentation de MEV, mais vous pouvez toujours essayer. Pour oela, 
j'ai fait NEW puis en mode FRO j'ai tapé la ligne suivante 1 : 000000 ... 
(lettre 0), puis je l'ai effacée. Ensuite, j'ai fais A$ (204) plusieurs 
fois . J'ai refai s plusieurs fois la même chose : NEW puis en mode PRD 
1 ' 000000 . . . ou 10 : 000000 (on peut varier le numéro de ligne 

ou le nombre de O, mais il faut que ce nombre soit supérieur ou égal à 5) , 
puis A$ (204) . Parfois RUN ou DEG n'était plus affiché ou bien l'appareil 
faisait des beeps assez bizarres. Finalement en tapant l'habituel MEM enter, 
j'ai découvert avec surprise 1936 steps 242 mémoires. 

Alors essayez avec des A$ (204) , des NEW et des 10 : 000000 à la chaîne, 

et sans ALL RES ET, s'il n'y a pas une méthode claire précise pour avoir 
1936 steps et 242 mémoire. Personnellement, je n'ose plus essayer car j'ai 
peur de me retrouver corme avant avec 1424 et 178. 


Mr Jean Yves GOURDON 


******************* 

Un caractère inhabituel peut être obtenu dans un programme, il correspond 
au code ”50" (juste avant le code correspondant à la lettre "A") . C'est le 
caractère curseur, le trait horizontal que l'on voit lorsque après avoir 
effacé l'écran, on tape un espace. Cannent l'obtenir ? 


Faire "NEW" 

Taper "A(203) = 0.00021052101" puis ENTER 
Passer en mode "PRD" (on peut déjà y être) 

Taper "MST 10" 

Il apparait : 10 : " - " 

Le caractère entre guillemets est celui qui nous intéresse. Pour entrer 
cette ligne en tant que programme, il faut : 

- appuyer sur une des deux flèches du curseur 

- taper ENTER 

Ensuite, par insertions, suppressions de caractères, on peut afficher œ 
caractère , etc . . . (on forme la ligne : 10 : PRINT " - " ou encore 
10 : A$ = " - " : FRINT AÈ ; A$ ; A^ . . . ) 




ASTUCES 


D'une manière générale, on peut "créer" certaines lignes de programme en 
rentrant une certaine valeur numérique dans la variable A (203). Par exemple, 
dans le cas précédent, on a fait : A(203) = 0.00021052101 

Il faut lire ce "message" de droite à gauche, et par groupe de 2 chiffres. 

On trouve alors successivement : 

10 : c'est le numéro quelconque de la ligne créée 
12 : c'est le code PC 1211 pour le caractère guillemet 
50 : c'est le code du caractère curseur 

12 : guillemet 

00 ; fin de ligne 

Ce qui explique la ligne obtenue : 10 : " - " 

Sur le même principe, on peut créer d'autres lignes. Par exemple (après avoir 
fait NEW) : 

A (203) = 0.021012101 ; ENTER ; puis "LIST 10" 

On voit apparaître 10 : " Q " 

Le caractère "créé" (correspondant ici au code "10") est le caractère INSEPT. 
Malheureusement, si vous essayez d'entrer la ligne dans le programme, (flèche 
du curseur puis ENTER) , ce caractère disparait. 

Pour ceux qui aiment les beaux "plantages", il y a deux codes qui les satis- 
feront : 85 et 97. En appliquant le principe précédent, en peut donc faire : 

NEW ; A (203) = 0.058585802 __ 

ou A ( 203 ) = 0.079797902 
Puis LIST 20 réactions étranges ... 

Restrictions à ce système de créa tien de ligne : on ne peut créer qu'une 
seule ligne, assez courte, et uniquement si la mémoire de programme est vide. 


******************* 


Vous avez vin programme quelconque dans la PC (ou même pas de programme du 
tout !) . Taper une ligne de programme du type "1 PRINT TT peut importe ce 
qui suit le PRINT, du moment que le PC affiche quelque chose. 

Le numéro de ligne est quelconque, du moment que la ligne est exécutée à 
un moment ou un autre. Puis, passer en mode RUN. 

Exécuter le programme RUN. Lorsque le PC a exécuté la ligne en question 
(donc qu'un message est affiché et que le PC "attend" que l'on appuie sur 
ENTER pour repartir, taper directement "MEM" et ENTER. 

Le PC affiche alors la mémoire disponible . Taper directement sur "CM" 
une seule fois ; l'affichage de "BREAK AT..." apparait. 

Enfin, taper directement soit ENTER, soit OONT et ENTER. 

Une erreur de type 1... apparait, mais regardez bien le numéro de ligne où 
a eu lieu l'erreur : c'est soit la ligne zéro (qui, bien sur n'existe pas), 
soit une ligne qui ne fait pas partie du programme (ex: ligne 1 alors qu'il 
n'y a pas de ligne 1 dans le programme ...) Bizarre, bizarre. 


Mais, 




ce n'est pas tout. 


ASTU suite 


Effacer l'écran avec la touche "CL" (rouge), passer en mode PFO. 
Appuyer brièvement sur la petite flèche vers le haut (^ ) ou sur 
l'autre ( ^ ) . Rien n ' apparait , mais patience : ce n'est qu ' après 
quelques secondes qu'une ligne apparait , le curseur clignotant sur 
le numéro de la ligne. 

Cette ligne peut éventuellement être une ligne de programme que vous 
aviez précédemment effacée, et que vous pouvez donc ainsi réinsérer 
dans le programme. 

Sinon, c'est une ligne de votre programme (en général, la dernière). 
Quelquefois, en appuyant durant quelques secondes sur la flèche , on 
accède à la mémoire interne (cela ne marche pas toujours...) 

Mr ZUMMER 


PROGRAMMES 

De Mr SANTARELLI Eric JEU DE PENDU JUSQU'A 24 LETTRES AVEC CORRECTIONS 


Ce jeu admet des mots d'au plus 24 lettres; il insère 
pour une lettre donnée cette lettre à toutes les places 
où elle se trouve dans le mot; voici le listing. 

10:"A" jCLEARîINPUT "nombre de lettres?" :Y 
20: FOR Z=1 TO Y:A3(z)="-":INPUT A3 (27+Z; :NEXT Z 




25:A3=^3(28):AS(y)=A3(27+Y)xP0R Z=2 TO Y-1 :IF A$(27+Z)=^3 
LET A5(Z)=A3îA(55)=^(55)+1 

26 : IF A3 $ 27+Z) =*AS ( Y) LETA3 (z) =AS (y) : A( 55 ) =A( 55) +1 

27 : NEXT Z : AS ( 56) =^AS ( 28) :A& ( 57) ( 27+Y) 

28 : A( 53 ) =$ :A3 ( 28) =" ! " s A3 ( 27+Y) =" ! " 

29 : PAUSE A8;BS;CS;DS;ESjï3;G$;3$;IS;J3; . .ETC . . . ;WS ;X$ 

30 :id. ligne 29 
31 :Id. Ligne 29 
32: GOTO (33+A(58)*57) 

33 «GOTO ((A(55)>ï-3)*56+34) 

34:INPUT"LETTRE:";A3(27):P0R Z=2 TO Y-1 ^ 

35:IF A3(27)^AS(27+Z)LET A$(z)=A$(27+z) :A(53)=1 :A(55)=a( 55)+1 
:A3(27+z)="! n 

40: NEXT Z:IF A(53)=0LET A(54)=^.(54)+1 

50:PAUSE A(54);" erreur(s)":IF a(54)>6 FOR Z*»1 TO 5: 

PAUSE "pendu! " îNEXT Z:GOTO 80 
60: IF A ( 5 5 ) =Y-2PRINT "bravo ! " :A3=A3 (56) :AS(Y)=AS(57) 

70: GOTO 29 

80:FOR Z=1 TO Y:A3(Z)=AS(27+Z):NEXT Z:A3=^S(56) :A3(Y)=AS(57) : 
A3(58)=1 : PAUSE "c' était... ":GOTO 29 
90:END 

EXEMPLE :1e joueur 1 fait (shft)A 

NOMBRE DE LETTRES? 8(ENTER)?P?0?Q?U?E?T?T?E 

le joueur 2 prend «dors le 1211 et voit XK P E — 

(on peut remplacer 29,30et 3 1 par29 : PRINT A3;B3; . . . . )&g. , b''te"'*at 
et ensuite (ou apres avoir fait enter s'il a remplacé29, 30,31 ) 

LETTRE :...A&fc>1 ERREUR(s)...P E—E. . .LETTRE: . . .T/oik) ) 

1 ERREUR(S)...P ETTE|;; LETTRE: ETC... 


PROGsuite 


OBJET : Aide à la rédaction des bulletins de salaire par calcul infonratisé 

des différentes retenues. 

CE QUE FAIT LE PROGRAMME : 

Partant d'une base de calcul plus gratifications éventuelles, 
l'inprinante sort pour chaque retenue : 

- sa dénomination en clair 

- la base et le taux de calcul 

- la valeur arrondie au centime de la retenue 

On obtient enfin la satine de toutes aes retenues, le net imposable 
et le net a payer. 

Valeur 9 janvier 1982 : plafond sécurité sociale 6590 

CE QU'IL NE FAIT PAS : 

Le prograrrme ne tient pas oorrpte : 

- du deuxième plafond S, S égal à 4 fois le premier 

- du plafond au prorata du tenps de présence pour les nouveaux 
embauchés en cours de mois 

- d'un acootpte éventuel (il suffit de faire la soustraction à 
la nain sur le dernier résultat) 

- d'un ETAM dont le salarié serait supérieur au plafond et inverse- 
ment d'un cadre qui serait en dessous* 

NOTA IMPORTANT : 

Le progr a mme doit toujours être testé avec un exemple dont on est 
sur. Notamment, vérifier que le plafond SS et les taux utilisés 
dans le prograrrme sont ceux en vigueur, sinon il faut les mettre 
à jour selon la procédure décrite à la fin de l'exerrple. 

DESCRIPTION : 

Théorie : 

Pour calculer une retenue sur la base Y et le taux X %, il suffit 
de faire X. Y/100, Les différentes retenues sont indiquées au cha- 
pitre affectation des variables avec leur base et leur taux. 

Pour les ETAM, il n'y a pas de pension, mutuelle et il n'y a qùune 
seule prévoyance à un taux différent des cadres. 

Pour les cadres, la mutuelle et les pensions ne sont pas retranchées 
du net imposable. 

Toutes les retenues sont arrondies au centime le plus proche. 

Le salaire différentiel pour les cadres est l'écart entre le 
plafond de la sécurité sociale et le brut. Pour les ETAM, le 
plafond étant égal au brut, le différentiel est nul. 

AFFECTATION DES VARIABLES 


A Base de calcul (salaire + gratifications, primes...) 

B Plafond sécurité sociale 

D Salaire différentiel = brut - plafond 

E Réservé au calcul intermédiaire de retenues et aux arrondis 
F Taux de sécurité sociale sur le salaire brut 

G Taux de sécurité sociale sur le salaire plafonné 

H Taux d'Assédic - chômage sur le salaire brut 

I Taux de retraite ETAM sur le salaire plafonné 

J Taux de retraite cadre sur le salaire différentiel 
K Taux de prévoyance sur le salaire plafonné 

L Taux de prévoyance sur le salaire différentiel 

M Taux de mutuelle sur le salaire plafonné 
N Taux de pension sur le salaire plafonné 

P Taux de pension sur le salaire différentiel 

R Total retenues 
S Net irrposable 
T Net à payer (A-R) 

US et VS Dénomination de la retenue calculée 
Y et X Base et taux de calcul 


7 


c^-oL» 

5. 5. MALADIE 
3850.00 5.60% 

215.60 

5. 5. VIEILLESSE 

3850.00 4.70% 

180.95 

CHOMA. ASSEDIC 
3850.00 0.84% 
32.34 

■'ETRAITE ETAM 
'3850.00 3.36% 
129.36 

RETRAITE CADRE 
0.00 6.18% 
0.00 

PREVOYANCE 

3850.00 0.75% 

TOTAL RETENU^ 88 
587.13 

NET IMPOSABLE 

3262.87 
NET A PAYER 

3262.87 



L MALADIE 
4500.00 5.60% 
252.00 

S. S. VIEILLESSE 
4500.00 4.70% 
211.50 

CHOMA. ASSEDIC 
4500.00 0.84% 
37.80 

RETRAITE ETAM 
4500.00 3.36% 
151.20 

RETRAITE CADRE 
0.00 6.18% 
0.00 

PREVOYANCE 

4500.00 0.75% 
33.75 

TOTAL RETENUES 
686.25 

NET IMPOSABLE 

3813.75 
NET A PAYER 

3813.73 


:G=4.7iH=.84 
: I*3.36i J=6. 
18 

20!K».6«L=1.35« 
M»1.05sN*.2« 
P~* 8 

30MNPUT "BASE 
DE CALCUL ?" 
;a 

40ï IF A<=BLET B 
— A"K~. r5: L=0 
:M=0:N=0:P=0 

5Qî D=A-B 

70sUt="S.S. "!V 
S-" MALADIE"! 
X-Fs Y=A! 
G0SUB 250: F- 
E 

80îU*="S.S.VIE" 
s V$=" ILLESSE 
"s X=Gs Y=Bï 
GCJSUB 250: G- 
E 

90:U$= ,, CHam. “ 
sV»*" ASSEDIC 
" s X=Hî Y=As 
G0SUB 250: H* 
E 

100:U$«"RETRAIT" 
:V$="E ETAU" 
sX=I*Y=B: 
G0SUB 250! I- 
E 

110:U$="RETRAIT" 
:V*="E CADRE 
"!X-J:Y*Ds 
G0SUB 250: J* 
E 

1 20! U*=”PREV0YA" 
!Vf**'NCE"!X« 
Kî Y=B:G0SUB 
250! K-E 


Exam p\es 


5. 5. MALADIE 

7500.00 5.60% 
420.00 

5. 5. VIEILLESSE 

6590.00 4.70% 
309.73 

CHOMA. ASSEDIC 

7500.00 0.84% 
63.00 

RETRAITE ETAM 

6590.00 3.36% 
221.42 

RETRAITE CADRE 
910.00 6.18% 
56.24 

PREVOYANCE 

6590.00 0.60% 

39*54 

PREVOYANCE 

910.00 1.355S 

12.29 

MUTUELLE 

6590.00 1.05* 

69.20 

PENSION 

6590.00 0.20* 

13.18 

PENSION 

910.00 0.80* 
7.28 

TOTAL RETENUES 
1211.88 
NET IMPOSABLE 

6377.78 
NET A PAYER 

6288. 12 


125ÜF D=OGOTO 1 
80 

1 30s Uf -"PREVOYA" 
!Vr- ,, NCE":X= 
LsY=DîG0SUB 
250: L-E 

140sU$="MUTUELL" 
:V*:="E"îX=Mî 
Y=B:G0SUB 25 
0: M=E 

1 50 !'U$* " PENS ION" 
! V'fs" "îX=Ni Y 
-BsGOSUB 250 
!N=E 

160:U$-"PENSION" 
i V$= " " ! X=Pî Y 
=D:G0SUB 250 

: p=£ 

180! R=F+G+y+I«*J+ 

K+L+M+N+P: 

PR INT "TOTAL 
RETENUES" 
19QîPRINT US ING 
“mm.ttir; 
R 

200!S*A-R+M+N+P: 
PRINT "NET I 
MP0SABLE" s 
PRINT S 

210: T-A-Rî PRINT 
“NET A PAYER 
" î FR I NT T 
220! GOTO 10 
250ïE=XY/E2:E= 
INT <E*E2+.5 
VE2! PRINT U 
fi Vf 

260* PR INT US ING 

Y 5 US ING "Bit 
.jurïxï"*" 
2?0îFR!NT US ING 
"CrnCJ.W'ïE 
! RETURN 
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LOGITHEQUE 




ASTUCES 



Des instructions dont on ne parle pas : PEEK et POKE 

Eh OUI! Votre PC 1500 a plus de connaissances que vous croyez. Elle possède 
des instructions dont le manuel ne parle pas. Si vous connaissez ces ins truc 
tions, passez oe paragraphe . 

Aujourd'hui, nous allons voir ces instructions. 

Elles permettent de lire et d'écrire dans les mémoires de la PC 1500. 

En effet, la mémoire d'un ordinateur se compose de cases que l 'on appelle 
octets et dont la succession forme la mémoire. Ce que l'on norme l'adresse 
c'est le rang d'une case dans la mémoire. (Cela va de O à 65535) . 


L ' instruction 
de œs octets 


PEEK nous permet de lire le contenu d'une de ces cases, 
On l'utilise sous la forme PEEK (ADRESSE) . 


d'un 


L'instruction POKE modifie le contenu de l'octet spécifié et s'utilise 

sous la forme POKE Adr, X. X est la valeur que l'on veut mettre à l'adresse adr. 

On peut aussi utiliser cette instruction sous la forme : 

POKE adr, X,Y oe qui revient à faire POKE adr, X : POKE adr + 1, Y 
Voici un exemple : 


POKE 20000,12,50 


PEEK 20001 


50 



1 

2 

3 

4 


Pour pouvoir utiliser les PEEK et POKE, voici quelques adresses de la mémoire 
de la PC 1500. Celles- ci vous sont données en héxa et correspondent à une 
PC 1500 seule ou une PC 1500 + CE 151 C4K) . Pour le CE 155 (8K) , soustrayez 

R00 H à l'adresse étoilée. 


Modules 8K adr - 800 H 

Zone réserve 4056 à 40C3 H 
Zone programme 40C5 

BUFFER D'ENTREE : 7B10 H 
ROM BASIC CE 150 : 8000 H 
ROM BASIC PC 1500: COOO H 


En avant la musique ; voici quelques fréquences correspondant aux notes de 
la gamme, de manière à pouvoir plus facilement programmer vos musiques. 

Valeurs correspondant aux notes de musique (instruction BEEP) : 


OCTAVE 

BASSE 

OCTAVE 

MOYENNE 

OCTAVE 

HAUTE 

NOTE 

VALEUR 

NOTE 

VALEUR 

NOTE 

VALEUR 

do 

215 

do 

105 

do 

4 9 

r e 

192 

r e 

93 

r e 

42 

mi 

169 

m i 

82 

mi 

38 

fa 

160 

fa 

79 

f a 

34 

so 1 

142 

s o 1 

68 

so 1 

30 

1 a 

126 

la 

6 1 

1 a 

26 

s i 

112 

s i 

53 

s i 

23 



V 


d o 

21 





r e 

18 





mi 

15 


10 



aasa aapao I 
aacaaa a a a I 


■ 






























































PROGRAMME PECRAN 


Ce prograrrme vous permet de tracer des dessins directement sur l'imprimante. 


Pour connenoer , faites RUN. Un menu apparaît, si vous désirez vous déplacer 
sur la table traçante, utilisez le pavé numérique canne une rose des vents. 
Si vous désirez changer de couleur, il vous suffit de presser la touche 5, 
alors apparait un second menu qui vous propose 

le choix entre les différentes couleurs 1 0 . RE.' h Tel écran 

(1ère couléur, 2âne couleur...), ... c'est à PC- 1500 

dire aucune couleur (déplacement du stylo) et 20 ; ulA I T 0 . CRAPH ; 

FIN pour sortir du programme. Presser les touches GLCURSOR Cl 10, 

de fonction en regard. -50) 

^ 30.CLEAR . CLS . 


Explications du prograrrme 


Ligne 40 
Ligne 50 

Ligne 60 


Ligne 70 
Ligne 80 
Ligne 90 
Ligne 100 
Ligne 110 


Test sur 1 'ASCII 

Si 5 a été pressé, je vais sur le 
second menu 

Je transforme l 'ASCII en une valeur 
correspondante à la touche pressée. 
Calcul de la direction à partir de 
ce nombre. Déplacement du stylo dans 
la direction désirée. 

Second menu 

Test sur les touches de fonction 
Suppression de 1 ' impression 
Fin 

Changement de couleur (0,1, 2, 3) 


I.S. 

RE NUMEROTATION 


65024; "Z" - N=-0. Î--&4 
0C5 

65025- N-N+10. ! F 
PPE K 2---&FE 
THEN END 

65026 - A- INT CN/256 
) . B~N-A*256; 
D 0KE I,A, B-I 
•-.! rPEEK Cl *-2 
) + 3. GOTO 650 


PRINT 'DIR. d 
aue rwfne . GHO I 
X. 5 ; 

40. A--ASC C 1 NKE’Y$ 

) . 1 F CAC 49) OR 
CA>52)THEN 40 
50. tp A-53THEN 20 
60 . A--UAL CHR$ A- A 
■--A- 4 • V-- INT CA/ 
3) - X-CA-Y*3--I ) 
* 1 0 . V '~Y* .1 0 . 
REINE -CX, V) ; 
GOTO 30 

70. CLS -BEEP 1- 
P R I NT ' C. ! C. 
2 C. 3 C . 4 . . 
p IN" 

80. A'- ASC C I Nk'EYS 
) . IF CAC 1 ? )0R 
CA >22 ) THEN 80 
90. 1 F A -2 1 RL I NE' - 
C0, 0), 9. GOTO 3 
0 

100.1F A---22LIA I T , 
PR1 NT 'AU REUC 
IR... Y END 
1 .1 0 . RL I NE -C0, 0), 0 
, A- 17. GOTO 30 


25 


Voici un programme très court (et c'est son intérêt) de rénunërotation 
(très utile après un ou plusieurs MEKGE) . 

- Ce prograrrme renumérote les lignes de 10 en 10 

- Ne: pas changer les n°s de lignes (65024=FEOGH) 

- Si vous "MERGER" le programme , le faire en dernier 

- Le lancer par "DEF 2" : le RUN peut ne pas marcher 
si le prograrrme à rénuméroter contient plusieurs 
lignes de même numéro (après un MERGE) . 

(Note du CLUB : pour CE 155 I = 38C5H) 


PERROT Bernard 
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Devenez Membre des 


D 

D 




A RETOURNEE A: 


BULLETIN D'INSCRIPTION AU CLUB PC 1211 


NOM : 

ADRESSE: 

VILLE : 

PROFESSION 
UTILISATION DE LA PC 



PRENOM: 
CODE POSTAL: 


Commercant chez qui la machine a été 
acnetee: 



1 51 -1 53 avenue Jean-Jaurès 
A 834-93-44 + 


93307 AUBERVILLIERS Cédex 
Télex 212174 F 





A RETOURNER A : 


RT TT ■TIFTTTJ D ' INSCRIPTION AU CLUB PC 1500 


NOM : 

ADRESSE : 

CODE POSTAL : 
PROFESSION : 
UTILISATION DE LA PC 



PRENOM : 
VILLE : 


Carmerçant chez qui la machine a été achetée 
N° de machine : 



151*153 avenue Jean-Jaurès 
AS 834-93-44 + 


93307 AUBERVILLIERS Cédex 
Télex 212174 F 



BULLETI N D 1 INSCRIPTION AU CLUB MZ 80 

NOM : . 

ADRESSE : 

CODE POSTAL 

PROFESSION : 

MODELE (A.K.B) : 

UTILISATION DU MZ : 

Carmerçant chez qui la machine a été achetée 
N° de machine : 




151-153 avenue Jean-Jaurès 


93307 AUBERVILLIERS Cédex 
Télex 212174 F 
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AS 834-93-44 f 









informations 


BULLETIN DU CLUB 


MZ 80 


B u 1 1 c? ti n t !'■ i me st riel 



No 1 Juin /Juillet / Ao 



éditorial 

Merci pour vos lettres d'encouragement. 

Nous constatons que le CLUB MZ arrive à point normé pour sortir 
un grand nanbre d'entre vous d'un certain isolement qui corrmen- 
çait à leur peser. 

Aussi, nous allons essayer de mettre les bouchées doubles pour 
rattraper le temps perdu. 

D'abord, le BULLETIN du CLUB MZ est séparé du BULLETIN PC. 

Ainsi, Sylvain BIZOIFRE aura beaucoup plus de place pour s'expri- 
mer et vous aussi, par la même occasion. 

Ensuite, vous constaterez que la logithèque mise à votre disposi- 
tion est déjà très attrayante . Il ne tient qu'à vous qu'elle ne 
le devienne encore plus. 

De plus, nous faisons appel aux. bonnes volontés qui seraient 
susceptibles d 'animer des CLUBS régionaux de façon à créer des 
liens encore plus grands entre les MZistes. 

Voilà, en quelques mots, présenté le premier BULLETIN du CLUB. 
Nous souhaitons qu'il vous plaise et qu'il soit suivi grâce à 
vous par beaucoup d'autres. 

Alors, écrivez -nous . Livrez -nous le secret de vos RAM. 

Et en parlant rames • 

Bonnes vacances et à bientôt. 

D.MDNTERNOT 



151*153 avenue Jean-Jaurès 

££ 834-93-44 + 


93307 AUBERVILLIERS Cédex 
Télex 212174 F 





LE CLUB 


A m i b M Z i s t e s ? B o n j o u r „ 


Comme vous pouvez I e constater ? avec ce 
premier bulletin entièrement consacre a votre ordinateur favori * le 
CLUB MZ est enfin devenu une realite. Mais ces quelques pages ne sont? 
en f ai t ? qu :t un t i mi de poi nt de depar t . C ? est VOUS ? ut i 1 i sateurs de MZ , 
qui? en partageant le fruit de vos laborieuses recherches avec 1 ? ensemble 
des adhérents? participerez ‘ é. 1 ' essor de ce bulletin? et favoriserez? ainsi 
une mai leur© commun! c a ti on entre MZ listes. 


** HR INC 1RES ET FONCTIONNEMENT DU CLUB « Le club est ouvert a tout posses- 
s ~ w r d © M Z U U K ? B ? A '"i u i n a u s f a i t . p a r v e n i r 1 a d e rn a n d e d 9 i n scriptio n 

s i t la e e? e n d e r n i e r" e p a g e ? r e m p 1 i e e t s i g n e e. 

1 9 a d h e s i a n a u c 1 u b e s t t o t a 1 e m e n t g r a 1 1 a i t e e t n e d a n n e 

1 i. e u a a la c t. a n e o b 1 i g a t i o t ) n i e n g a g e m e n t d a u c u n e s o r t e , 

Chaque adhèrent recevra? 4 fois par an? le bulletin 
d u cl LAb ou seront recensées toutes 1 es astLAces? suggest i on s? i dees? ai nsi 

q u e 1 e s p r o g r a m me s e m i s p a r 1 51 e n se m t? J. e d e s a d h er e n t s » 

PoLXr tout problème particulier ? i l est egalement 
possi b 1 e a chacLAn de quest i onner votre servi teur ? soi t par cour r i er ? soi t 
par tel ephon© (les 2emes « et. 4emes mardis de chaque mois? de 14h a 18h ) ? 
il fera le max i mum et mettra? eventuel 1 emen t ? 1 * équipé SHARP a contrihu- 

“ t .i o n p o la r t e n t e r d e v o la s d o n n e r s a t i. s f a c: t i o n « 

La possi foi 1 i te de réunions entre MZi stes est égal ement 
e t la d i e e ? m a i s ? a 1 h e la r e a c t u e 1 1 e ? p» 1 la b :i. e la r s p r o h 1 e m o s n e s o n t p a s e n c o r e 
* •' e s o 1 u s “ c e n t r a J. i s a t i o n su r F* a r’ :i s ? d o n ? c:! e f a v e la ï " e n v e r s 1 e s p r o v i n e i a u x ? 

]. o c a u k ? h Ci r a i. r** c? s q u i s a t i s f a s* e;- e n t 1 e p 1 la b g r a n d n o m b r e ? e t c:: * . » S i v o u s 

a v e z d e s i d e e s o la d e s p o s s i b i 1 i t e? s d a n s c. e d o f n a i n e ( 1 o c a u x ) ? n ? h e s i. t e z 
P a s a n o u s e n f a i r e p a r t « 


*1 *!T 

Tl **+ 


c. h e v r o n n e s e t d e 1 1 :}? 


? es m a î7*. i 


ET LES PROGRAMMES ? s La procedure concernant 1 ps échangés de program 

-mes» adoptée apres moulte hésitations? répond a 3 objectifs ; 

i ). Posséder des logiciels de qualité en accordant une légitimé 
cari t r e f» a r t i e a u h c r e a t e u r s d e c: es 1 o g i c i e 1 s . 

2) Paire profiter de ces programmes? par une répartition équitable» 
l’ensemble des 'adhérents? permettant ainsi aux MZistes débutants 

r 

cl e b e n e f i c: i é r d e l'a c:: q u i s d e s p r o g r a m m e u. r" s c. h 0 v r o n n e s e t d e 1 e 
m b 1 1 r ' e e n p r a t i q la e d a n s J. e la r " s a p p 1 i c: a t i o n s f u t la r e s « 

3) De créer? par le biais de ces ' échangés? un 11 ESPRIT CLUB 11 ? amical 
et solidaire? trait cL'u.nion entre tous ses membres. 

D a n s c e 1 1 e o p t i q u e ? n o la s v o la s p r o p o s o n s 1 e s m o d a 1 i t e s 
ci i v a n t e s p o la r n o la s e n v o g e r o la v o la s p y o c: la r e r d e s p r o g r a m m e s s 

* chaque programme reçu d'un adhèrent se verra attribuer un nom- 
bre d'etoiles (de 1 a 10)? en contrepar Lie? le concepteur de ce logiciel 

fo e n e f i c i e r a d la n fo o n u s e g a 1 a 2 ? 5 f o i s 1 e n a m b r e d ? e t o 1 1 e s a 1 1 r i b u e e s ? 
q la ' i 1 p ça la r r a u t i 1 i s e r p o u r p la i s e r d a n s 1 a 1 o g i t h e q u e « 

* En guise' de cadeau de bienvenue? chaque adhèrent aura a. son 
crédit ? des son inscription? 25 étoiles qui lu.i permettront d ' accéder 

a 1 a 1 o g i t h e q la e ? 1 e s e v e n t la e 1 s b o n la s g a g n e s p a r 1 ' e n v o i d e p r o g r a m e s 

personnels venant? bien sur? s'ajouter a ce crédit., Ce cadeau sera renou- 
velé toiAS les ans? a la cia! te cl* inscription de 1 'adhèrent. 

# pour commander un ou- plusieurs programmes de la logithèque? 

i 1 suf f i t d ' avoi r a son er edi t un nombre d ' etoi 1 es au moi n*n égal au total 
des etoi les demandées pour chaque programme commande. 

# N ' o u h 1 i e z P a s q u e t o u t e s c e s p e t i t e 3 e t o i 1 e s s o n t g e r e es par 
un MZ 80 B et qu. "il est i --n~-f — a--i —1 -1 —i — b — 1 -e ! ! î ., Nous étudierons? par 
contre? toute suggestion suceptible d' améliorer le fonctionnement du club 
ola de perfectionner le système cl échangé entre ses adhérents. 

Il est temps? maintenant:^ de passer aux actes? tournez la page? 
et entrez dans le vif -du sujet» « « Prochain numéro a la rentre.©? A BIENTOT 


SYLVAIN BIZ0IRRE 


2 


MZ80B 


Monsieur BEROOV ICI» -adhèrent du club, nous a -fait parvenir ce programme 
trc?s court mais bien pratique de répétition automatique de caractère? il 
bénéficié ainsi d'un crédit de 4 $■ 2,5 = 10 étoiles 

Ces quelques lignes sont a implanter a la suite du programme "DEF KEY" qui 
initialise les touches pre-programmees? il sera ainsi charge en mémoire 
a chaque utilisation du 80 B. 

Son utilisation est très simple s il suffit de frapper un caractère (si 
caractère minuscule? reverse ou graphique? allumer la L.ED correspondante) ? 
de relâcher ou non la touche puis d'appuyer simultanément sur les touches 
’BRPH' et 'RVS'? le caractère initial sera répété tant que ces 2 touches 
seront enfoncées. Seuls? les caractères 'CLR'? 'INST' et 'T' ne sont pas 
pris en compte. 

10 FOR 1 = 1 1021 s READ A: PÜKE65336+ 1 , A". NEXT1 
20 FOR 1=1 T0 3: READ AsPOKE 2440+1 , A: NEXTI 
30 END 

40 DATA 237,91,38,0, 120,254,9? 192? 237, 91 ? 6? 0, 6, 0? 197, 1,80,0, 195, 4,5 
50 DATA 205,57,255 


'iifir*' HNt; 1 —ntinr— **** :***•+- ■ •**«*«* ■ 


Une autre astuce egalement indispensable? sur le MZ 80 B autorise l’affi— 

- c: h a g e d e s 4 f 1 e c h e s d e d i r e c t i o n e t d e s H ( H o m e ) e t ’ C ? ( C 1 e a r ) sans 
avoir a passer par les rébarbatifs ? CHR$ < 1 a 6> ? . 

P0KE$08F“2 ? $ 1 8 

FOR 1 « 1 T 06 5 ?T AB < 1 1 > ; CHR$ (I > = ? = NEXT I 
3) Devant chaque signe ainsi forme? taper DEFKE Y ( X > ~ ' puis LCR3? 
vous pourrez: ainsi utiliser les touches preselectionnees pour 
•faire apparaître les 6 signes de contrôle,, 

Attention? cette astuce n'est valable que pour creer des lignes de progra- 
me? pour faire tourner ce meme programme? il vous faudra réintégrer la 
valeur initiale de l'adresse $08F2 en lui ' pokant' la valeur $20 « 


1 > 

Faire 

2) 

? r» 

3 > 

Devant 


vous p 


fai re 

c 

i,*. 

et te as 


* ♦mur « - umi*‘ ***-: «« t ■ *•*•** tmr - «--i :tur ** —ir: tt *** * - -«im* -■ * 1 itttii -mur *****t4Uti * ****-uhm — *** 


Un petit programme, maintenant, qui vous permettra de faire une copie de 
sécurité de votre cassette BASIC s 

5 '•'"INTRODUIRE LA CASSETTE ORIGINE ET TAPER UNE TOUCHE " s G0SUB60 : PR I NT 
1 0 L I M I 1 T 80 00 : USR ( $02 SE ) : U8R t $04 CE ) 

20 P0KE* 1 0D5 , $80 8 USR ( $02B2 ) 

30 ?" METTRE LA CASSETTE DESTINATION ET TAPER UNE TOUCHE" s 80SUB60 
40 PGKE* 1 ODS , $00 s USR ( $025 3. ) s USR ( $04CE ) 

50 P0KE$ 1 ODS , $80 : USR ( $0282 ) s END 
60 BETA* s I FA$ = " " THENfcO 
70 RETURN 




** La page artistique avec quelques élucubrations musicales? ou plutôt? , 
sonores» "commencez par taper ce court programme s 
f 0 A- 1 5 B -55 5 C-25 s D- 1 s E- 1 s F- 1 

20 FOR I -ATOBSTËPF s F 0 R J - C “I G D S T E P E! : PQKE*0EC 1 , J s PQKE*0EC4 ? I s USR < 3774 ) 5 NEXT J ? 1 
Il vous suffira? ensuite? de modifier chacune des variables de la ligne 10 
(en respectant les réglés FOR» «NEXT» . S TE. P' ) pour obtenir une variété 
infinie de sons en tous genres» „ « Envoyez nous vos decouvertes dans ce 
damai ne 5 1 es 3 mei 1 1 sures recherches sonores ' seront i nscr i tes dans 1 e 

prochain bulletin et donneront droit? a leurs auteurs? a un programe de 
1 e u r c h a i m a c h o i s i r d a n s 1 a 1 o g i t h e q u e » 




Pour conclure cette rubrique 80 B, quelques adresses utiles s. 

$10C0 (4288) -Indique quel type de programme est actuellement charge en 

mémoire. l=Programme en lang. machine (OBJ.)? *2=Programme en 
BASIC; 3=Donnees séquentielles sur cassette; >3=Programme assembleur édité 
ou relogeable. 

$10C1 4$10D1 —Ces adresses contiennent le titre du programme charge suivi 
(4289)4(4305) de 'CR' (0DH) 

$10D2 (4306) -Indique sur 2 octets, la longueur du programme. 

la première adresse ou se situe le 


$ 1 0D4 (4308) 


$10D6 (4310) 


•Indique sur 2 octets, 
programme. 

•Indique sur 2 octets, 


l'adresse a laquelle commence l'execu 
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tion du progranme. 


• MZ 80 K 


U n n d u v e a u. b a s i c e s t n e ? i 3. t o u r n e s u r M Z 8 O K ? il est 
très pu i ssant ? presque pascal i en ? i 1 s ; ' appel 1 e "SUPER BAS IC" « Son auteur ? 


’i 


Ber n ar d I<OI<AWOSI<Y ? mer i t e ? a j ust t 
tiens» 11 , « . Au vu de ses nombreuses 


t i t r e ? n g t r e ad m i r a t i o n e t n os t e 1 j. c i t. a 
ppssi bi I i tes (compati bi 1 i te avec les 
basi es 5025 et 5060 h progr ammat i on structurée? recur si vi t e m f onct i ons 
mathématiques? je pense qu* il pourrait intéresser les personnes désirant 
u n 1 a n g âge , o *f f r a n t 1 a t a c: i 1 i t e cl :r u. t i 1 i s a t i o n d u. b a s i c e t 1 a p u .i. s s a n ce d u. 

P a s c: al»"» Ai n s i e s t p r e s e n t e "S U P E R B A 8 1 C ' ' p a r s o n a u t e u r ? v a u s p o u r r e z 
juger vous-meme de la puissance de "SUPER BASIC" a la lecture de cet ex- 
pose « Ce programme est d i spon :i. b 1 o dans 1 a 1 og i theque ? et vaut 
v o u b p o la v e z e g a 1 e m e n t v o u s p r o c la r e r la n e s e r 1 e d e 5 p r o g r a m rn e s 
t r*' & t i o n i 1 1 u s t r a n t 1 e s p o s s i b i 1 i t e s d e c e B a s i c;: ( 1 0 e t o i 1 e s ) » 


10 et pi 1 es; 
de démons- 


GE:!NERALI TES SUR LE "SUPER BASIC" « taille mémoire ï I8K (nécessite? au 
m a i n s ? 3 2 K d e M E V ) « E n t i e r e rn e n t c: a m p a t i h i. e a v e c: 1 e B a s i c: 5 0 2 5 « C o m p a t i b 1 e 
avec le BIS BASIC VM 5060 a 1 ‘"exception de 4 codes aisément modifiables» 
Permet de progr amer comme en BAS IC. nanna 1 avec p j. u si surs avantages s GOTO 

expression mathemat i que ? IF ÏHEN » « . ELSE ? REST0RE numéro de 1 igné? amel i o- 

•“ration des commandes graphiques < PO I NT ? PLOT) etc. » » liais son atout 
majeur résidé dans la possibilité de fai re de la programmât i on structurée 
< IF » - El... S I F « . ELSE „ . END I F « , CASE . . WHEN » « 0THERWISE. - ENDCASE. . etc » » ) et de 
taenef ic 1er des .structures recur si ves du pascal (PROCEDURE et FUNCT ION) - 


FUNCTI0N 


V H 


#. 


IV II H » Il 4t il 


COMMANDES MODIFIEES OU AJOUTEES AU BASIC 5025 

C0PY .«„«»« C0PY A (0) ;i B (0) Recopi e 1 e tatal eau B ( i > çjans c:; o .1. ui des A ( i > ? peut 

recopie?!- des tableaux a 1 ou 2 dimensions» 

PR I NT US I Nfâ .... PR I NT USIN6"###. ##" 5 12? 0 donnera a 12,00 

Permet d ecr i r e I es va i eurs numer i que s dan s un f armât prêt: i se 
par le string qui suit PR INT US INB. Peut egalement formater des 
v a 1 e u r s i n d i q la e e s e n n o t a t i o n s c i e n t i f i q u e » 

Le mot FUNCTÏON est 1 " introduction a un sous programme définis- 
sant. une "fonction utilisateur"; ün peu t donner un nom a cette 
f o n c t i o n e t. 1 li i a cl j o i n d r e d e s a r g la m e n t s ( v aria b 1 e s n u m e r i. q u e s o la 
al pha ) dont el 1 e se servi r a pour produi r e un resul tat r\umer i q ut:a 
ou al pha. Les arguments peuvent etre I e resul tat d une FUNCTÏON 
precedente <d ; ' ou la récursivité) « Le retour* d'une fonction se 
fait par RESUL T suivi d une expression numérique olà alpha» 
qui donne le résultat calcule par la fonction. 

E> g m ta o 1 e d ;t a p p» e 1 d u n e f o n c: t i o n ? d o :i. t e t r e s la i v % d la n om et des 
o v c? n t la e 1 s a r g la m e n t s d e c: e 1. 1 e f o n c t i on . 

PROCEDURE. Le principe et le fonctionnement de PROCEDURE sont très proches 

de FUNCTÏON? la seule différence résidé dans' le fait que le sous- 
programme PROCEDURE! produit un effet (modification de variables? 
graphes etc»»)? le retour se fera donc par RETURN. 

. » « S y m b o J. e d a p p e 1 d u n e p r o c e d u r e 

» » MODE 0 n ? autorise que 1 a construct i on IF. » ÏHEN » . ELSE ( f acul tat i f ) 
MODE 1 au t or i se I F « « ËLS 1 F . . ELS I F » « ELSE . . END I F . 

SWAP. »... » SWAP A (0) ? B <0) échangé les tabl eaux A ( i ) et B ( i ) ? peut échangé*** 

des tableaux a une ou deux dimensions 
NULL» » « « . . NULL A (0) ? (0? 0) remet a zéro 1 es tableaux A ( i ) et B ( i ? j ) . 

ENDIF. « « r Permettent l'imbrication de pl las! eurs conditions et Je sacit a 
EüLSIF*. » « L - ENDIF lorsque l'une de ces conditions successives est remplie. 

rStructure empruntes a la langage PASCAL analogue a la str uct Lire 
I IF. « ELS IF.» END I F » Permet de comparer u n e var i ab 1 e numer i que ou 
WHEN. . . . . I al pha avec une ou plusieurs listes. Si la comparaison est posi — 
0THERW I SE M: i ve ? saut a ENDCASE; sinon? aboutissement a ÜTHERWISE. 

LIST. ..... Memes commandes que le Basi c 5025? pl las s. 

-Arrêt nomentane du listing en appuyant sur "SHIFT" 

-Arrêt prolonge avec "BREAK" et appui sur une touche quelconque 
LÏST/Hnnnn. Af f iche le contenu de la mémoire a partir de 1 ? adresse nnnn (H) 
LIST/PHnnnn. Idem sur imprimante 


» « n ii i u 


MODE . 


it tr 


CASE 

0F. . 


n n ii » a 


A 


LIST/V ou LIST/PV. Affiche le nom et les valeurs des variables utilisées. 

LIST/V$ ou LIST/PV$» Li ste des variables alphanumériques. 

OLD Récupéré un programme efface avec: "NEW" si aucun calcul n'a ete 

effectue par le basic: entre, temps» 

FOR. ...... Autor i se 12 boucles .imbriquées (voir " E X 1 T " ) 

GOTO. .... .Peut etre suivi d’une expression arithmétique?. 

GÜSUB Idem a "GOTO"? sans limitation de "GOSUË" imbriques. 

LQAD+-. .... Charge un programme a la suite du precedent sans l’effacer. 

LOAD= ..... Charge un programme? en assembleur a partir de l’adresse prevue 

dans ce meme programme. 

RESTORE . . . Peut etre suivi d’un No. de ligne ou d’une expression arithm. 

CL_R. ...... Peut effacer une ou plusieurs variables choisies. 

EXC. ...... Permet d’ ©changer 2 variables entre elles; 1 ’ échangé de varia- 
bles en tableaux est egalement possible. 

REPEAT . . . . El ement de la boucle "REPEAT. «» ONT IL" qui execute tout ce qui se 

trouve entre "REPEAT" et "UNI IL" jusqu’à ce que la condition qui 
i suit "UNTIL" soit satisfaite. 

WHILE. .... El ement de la boucle " WHILE . . » WEND" qui execute tout ce qui se 

trouve dans la boucle tant: que la condition qui suit "WHILE" est 
sati sf ai te» 

ELSE» ..... El ement des tests IF » . THEN» » ELBE (SI .. DONC» . SINON) qui execute 

l ’ instruction qui suit "ELSE" si la condition "IF" n’est pas 
satisfaite 

XOR » Et , ou? ou exclusif logiques qu’il est préférable d’utiliser 
a la place de "..) + (.." et "..)#(••" qui peuvent conduire» dans 
certains cas» a des erreurs d ’ i nter prêtât i on du Basic. 

.Permet de savoir si un point allume par "SET" est allume .ou 
eteint. 


AND, OR, 


POINT. 


H M 




et 


»V 


n it 


««Symboles du maximum et du minimum d ? une variable. 


L.PÜS et RPQS* Instruct: i on b de recherche d ? une sous-chai ne? par la gauche c*u 

1 a d r o i t e ? d a n s u n e e h a i n e d e c: a r acte r e s . 

HEX$. ..... Conversion d’un nombre décimal en hexadécimal. 

DEC. ...... Inverse de HEXS. 

VARPTR. ... Donne l’adresse du premier octet, de la variable alpha ou alphan. 

INV$. ;.... Inverse les caractères d’une chaîne alphanumérique. 

EVAL ...... Est une chaîne de caractères constituant l’ écriture normale 

d ’ u ne f o n c t ion definie p ar " L> E F F N 1 ' 

KEY. ...... Identi que a. "GET", mais fonctionne en continu. 

liOVE. ..... Ordre de déplacement d’un pseudo-curseur graphique (invisible 


sur l’écran) 


PLOT 
CURSOR . 
RENUM » 


m « n tt a tr 


* u n 


» «r «fl ti 


C) r d r e d e t r a c: e o u d e f i a c: e fri e n t g r aph i g u e d e d r o i t e s s u r 1/ e c r an . 
Place le curseur sur le x i eme caractère de la yieme ligne. ^ 
Renumérotât i on des lignes d ? un programme avec choix du pas entre 
2 lignes et d’une zone de programme a renuméroter. 

DEL» ...... Per met d" effacer certaines lignes ou groupes de lignes d’un pro g 

TRÜN. « . . . » Af f i che successivement tous les Nos. de ligne en cours de trai— 

• -- t ement « 

TROP F Annule le mode “TRACE". 

AUTO. .... « Numérotât i on automatique des lignes en mode édition. 

MERGE. . . . . Permet de? mélanger 2 programmes apres leur chargement successif 

par "L.OAD+" . 

COMPACT. .. El i mi ne tous les espaces inutiles dans les lignes de programme. 

EXIT .Permet de sortir de 1 ou plusieurs bouc 1 es imbriquées. 

WAIT. ..... Boucle d’attente variable en cours de programme. 

DO. ....... Obi i gâtai re dans la boucle WHILE. .. DO. .. WEND » petit egalement 

remplacer "THEN". 

Affiche le? contenu d’une ligne de prog. sans son numéro. 

Permet cle présenter les lignes de programme avec p>l us de clarté 
sansque le Basic efface les espaces. 


DISP. 


N tt II U It 


n n / n w 


.... 


Voici» resumees» les principales caractéristiques de SUPERBAS I C - 
Toutes ces indications ont ete tirees de la documentation très complété 
que Monsieur KOKANOSKY nous a transmise avec ses programmes et dont vous 
pourrez egalement bénéficier. 

Ce programme sera disponible des la rentrée; Chaque demande de C 
SlJPER BASIC devra IMPERATIVEMENT etre accompagnée d’une cassette vierge» ^ 
faute de quoi» il nous serait impossible d’y repondre. 


*&=•*' OISEUX BASSE RESOLUTION E K ZI 


OTHELLO 1 . . 

BEAU 6RAPHISNE, NIVEAU HOYEN 

JUMPING BALLS 

JEU DE REFLEXION, TRES RAPIDE 

POKER . 

Beau graphiste des cartes, niveau ton en 

SPACE FIGHTER . 

JEU DE REFLEXION ET D’ADRESSE; RAPIDE, GRAPHIQUE, SONORE 

lü" ? ADRESSE; ^TTRAP’PÊR *LÉ MflX’lHUH* D’ETOILES eYeVIT’aNT'dE* + EN "+ ’d "QBSfACLES 
COURSE DE VOITURE 


ROUTE ALEATOIRES 3 NIVEAUX DE VISIBILITE, 5 LARGEURS DE ROUTE 

MUR DE BRIQUE 


JEU D’ADRESSE; GRAPHIQUE; NIVEAU HOYEN \ 

LABYRINTHE EN 3 DIMENSIONS ..../ 

SORTIRD’i LABYRINTHE DONT ON CHOISIT LES DIHENSIONS; GRAPHIQUE & PASSIONNANT ! (BASIC 5010) \ 

MORPION / 

ALLIGNER 5 CROIX DANS UNE GRILLE iOUOi HZ LENT (30 sec.) HAIS TRES FORT \ 

LE MARAIS DE L’ ALLIGATOR / 

CUEILLIR LES NOIX DE COCO SANS SE FAIRE HAN6ER PAR L’ALLIGATOR; GRAPH ET SON TRES REUSSIS \ 

TOURS DE HANOI / 

JEU DE (GRANDE) PATIENCE CHINOIS, DEMANDE BEAUCOUP DE REFLEXION \ 


TELECRAN 

CREATION DE DESSINS* SUR L’ÉCRAN AVEC 'FONCTION ’*SE*T r 

TEL ECRAN MEMO I RE 

IDEHA TELECRAN HAIS AVEC CARACTERES NORMAUX ET MEMORISATION DE PLUSIEURS PAGES DE DESSINS 

ECHECS MZ . 50 

BONNES PARTIES, AU NIVEAU 5, CONTRE JOUEUR MOYEN; AFFICHE LES COUPS, GRAPHIQUE REUSSI 
A5TER0 I DES 

TENTER DE TRAVERSER L ’ ECRAN EN "EVITANT *DÉS ’OBSTACLÉS *Elï TOUS ‘GÉNRES. PRATIQUÉ D*U*MZ*)* 

PR T QflMKl T CDC 

HZ TENTE DE SORTIR DUIN LABYRINTHE *DONf VOÙS*AÛRE*z‘CHOfsî LA*DI*FF*ICULTÉ. ÊTRES* DEMONSTRATIF* 

PAPER STONE 

JEU DU PAPIER-PIERRE-CISEAUX.... EROTIQUE... 

MISSILES 

TENTER D’ATTEiNDR*E*lQ* CIBLÉS ‘sÛr’gRILLÉ dVio'uVaVEC* fND’lCATlÔNS* Â CHAQUE *C0‘UP* TIRE* 

Allumettes 

CELEBRE JEU CONTRE L’*ORDI*NÂTÉUR * LE *DÉRN I ÉR *QUI ‘PREND "UNE *ALLUHÉTfE *A *PÉRDU 

ISOLA 

SE JOUE A 2. LE PREMIER QUI ARRIVE A IMMOBILISER SON ADVERSAIRE A 6AGNE 

OTHELLO 2 

MOINS GRAPHIQUE MAIS BEAUCOUP PLUS FORT QUE 'OTHELLO 1’ 

QTûRTRCrii' 

CELEBRE JEU DE GUERRE* SPÂCI*AL*E,* UTILISÉ foÛTE*s'LE*S ‘POSSIBILITES GRAPHIQUES Yso’no’rÉS *DÉ HZ ’ 

BOWLING. ; 

TRES GRAPHIQUE; AFFICHE LES SCORES ET LES QUILLES COMME DANS LA REALITE 
COLDITZ 

JEU DE SITUATION ‘CONVERSAT fONNEL *EN ANGLAIS: EVASION NQÛVÉHÉNTEÉ DE LA FORTERESSE DE COLDITZ 
RUBICUBE • ■ 

PROBLEMES PROGRESSIFS A*VÉC*GRAPHI*QÛe’dÉ TOUTES 'LES “FACES ‘dÛ CUBE;' RESERVE AUX AS*! 

GOLF 

REPRESENTATION GRAPHIQUE DE 16 TERRAINS DIFFERENTS... TRES COMPLET ET DOCUMENTE 

Al I IKI T cicari: 

UN MODELE D ’ EXPLO I T Af ION "DES ‘PÔSS I B I L I f ES GRAPHIQUES *DÛ HZ;’ d’eHANDÊ BEAUCOUP ‘DE SANG -FROI’d * 

POULES ET RENARD.. 

IL FAUDRA BEAUCOUP DE RUSE AU RENARD (VOUS) POUR ECHAPPER AU POULES (HZ) SUR UN DAMIER 
AUTO- CROSS 

FAIRE UN CIRCUIT EN Ûn’ni'nIMÛn’dÉ TEMPS* ÉN*EV*ITANT*T0’US LES OBSTACLES. (GR’aPH ‘ît *SQN)* * * * * 
C 

ATTRAPER LE FAUVE* ÉCHAPPE* LE’PLUS RAPIDEMENT 'POSSIBLE* 

LP uni PIIR 

VOUS ETES LE VOLEUR ET *DÉVÉZ ’rÂHMASSÉR *LÉ PLUS *POSSI BLE D*E 'DIAMANTS ÉN*EVÎT*AN*T*LÉS*CHIÉNS * 

HANOI MODIFIE 

LE JEU COMMENCE AVEC UNE COMBINAISON PRE-ETABLIE; 5 NIVEAUX 

JACQUET 

JEU CONTRE HZ AVEC GRAPHIQUE DU JEU ET DES DES 

SOUS MARIN 

VOTRE SONAR VOUS AIDERA A COULER DES NAVIRES SUR UNE GRILLE DE DIMENSIONS VARIABLES 

SUPER-MASTERM I ND 

COMBINAISONS DE 3, 4, 5 OU B CHIFFRES; 1 JOUEUR (CONTRE HZ) OU 2 JOUEURS 

PUISSANCE 4 

JEU DE DEDUCTION CONTRE HZ; DIFFICILE A BATTRE (AU DEBUT...); JOLI GRAPHISME 

LE CHATEAU HANTE..... 

JEU DE SITUATION TRES COMPLETS PEUT DURER PLUSIEURS HEURES !; LIVRE AVEC NOTICE... 

LA BOITE A ATOMES 

JEU DE REFLEXIONS TRES DIFFICILE A BATTRE AU NIVEAU 95 GRAPHIQUE 

GENERATEUR GRAPHIQUE ALEATOIRE 

DIVISE L’ECRAN EN 4 ET 6ENERE UN GRAPHIQUE ALEATOIRE SYMETRIQUE DANS CHAQUE 1/4 D’ECRAN 
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CA J 

r n ] nAOoAK: 

CKD CBD CAD 

< BAS I C > 

**** 

CK 3 LAD 

< BAS I C > 

*** 

CK3 C A3 

< BAS I C > 

***** 

CK3CA3 

< BASIC > 

****** 

CKD C A3 

< BASIC > 

***** 

• 

CKD C A3 

< BAS I C > 

***** 

CK3 C A3 

< BAS I C > 

**** 

CKD 

< BAS I C > 

******* 

CK3 C A3 

< BAS I C > 

***** 

C K 3 

< BAS I C > 

******* 

C K 3 C A 3 

< BAS I C > 

***** 

CKD CAD 

< BAS I C > 

*** 

CKD 

< BASIC > 

***** 

CKD 

<MACHINE> 

******* 

CKD CAD 

< BAS I C > 

***** 

CKD CAD 

< BAS I C > 

****** 

CKD CAD 

< BAS I C > 

***** 

CKD CAD CBD 

< BAS I C > 

**** 

CKDCADCBD 

< BAS I C > 

** 

CKD CAD 

< BAS I C > 

***** 

CKD CAD 

< BAS I C > 

****** 

CKD CAD 

<BAS I C > 

******** 

CKD CAD 

< BASIC > 

****** 

CKD CAD 

< BAS I C > 

***** 

CKD CAD 

< BAS I C > 

******* 

CKD CAD 

< BAS I C > 

******** 

CKD CAD 

< BAS I C > 

******** 

C K*3 C A 3 

< BAS 1-0 

****** 

CKD CAD 

< BAS I C > 

***** 

CKD CAD 

< BAS I C > 

**** 

CKD CAD 

< BAS I C > 

***** 

CKDCADCBD 

< BASI C > 

***** 

CKD CAD 

< BAS I C > 

******* 

CKD CAD 

< BAS I C > 

***** 

CKD C A3 

< BASI C > 

***** 

< BAS I C > 

CKD CAD 

***** 

CK D CAD 

< BAS I C > 

******** 

CBD 

< BASI C > 

****** 

CKD CAD 

< BASI C > 

*** 
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BENERATEUR GRAPHIQUE ALEATOIRE ( GPH 1) 

DIVISE L’ECRAN EN 4 ET GENERE UN GRAPHIQUE ALEATOIRE EN Hte.RE5.DANS CHAQUE 1/4 D’ECRAN 

POUSSE-POUSSE (GPH 1) / 

REPLIQUE DU CELEBRE JEU DE PATIENCES NIVEAU* » DEMANDE PATIENCE 4: LOGIQUE, GRAPH. ANIME \ 


< 


CEO 

t * t 

CEI 

******** 


< BAS I C > 

< BASIC/ 


« IT X B 1. T iP» I! FC EL E3 El K :i 


s.: f* j 


o ;:i 
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BAS I CO I S 

BASIC EN FRANÇAIS POUR BASIC 5010 ET 5025 

SUPER BASIC 

BASIC AU* MULTIPLES POSSIBILITES BON T CELLES Bii PASCAL (RFCIIRSIVITE I- PROR. STRUCTUREE 
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/ 
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CK 3 

* * * 

C K 3 

********* 


< B A S I C > 

< MACHINE > 


mu p <=* j: OU B !E£. », 


’H'OME:» !£::.. 1 
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BACH 

2 EXTRAITS DES SUITES POUR VI 01 RNCEI î E (LE VÎ0L0NCFU E N’EST PAS COMPRIS) \ **** 

ACCORDEON.. / CK3CA3CB3 <BASIC> 

'LE VOL DES HIRONDELLES'; UN P’ TI T AIR D’îlUSFTTE V *** 


/ C K 3 C A 3 C B 3 <BASIC> 
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RESOLUT ION EQUATIONS. 

EDüAT i ON S 1er-. 2sff : s*i 3 e »» e DEGKE 6 EüümTIONS m 3 IhCONNülS 
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CK3CB3CA3 < BASIC/ 

* * * * 


Jli'L 1 ! 
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R.L.C. SERIE ET PARALLELE..................... 
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ANNUA I RE DE ■’ L' ORD I NAT*EÜR '’l'NDÏ VI DUEL ’ ........ 
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CK3CA3CB3 

* * * 

CK3CA3CB3 

******* 

C K 3 C A 3 C B 3 

4l« ul| éU Uf 


< BASIC/ 
< BAS I C > 
< BASIC > 


CS 

Devenez Membre du Vjtj 




DES UTILISATEURS DE 




BULLETIN D 1 INSCRIPTION AU CLUB MZ 80 


NCM : 

ADRESSE : 
OCDE POSTAL : 



PROFESSION : 

MDDELE (A.K.B) : 
UTILISATION DU MZ : 


PRENOM : 
VILLE : 


I 


Camerçant chez qui la machine a été achetée 
N° de machine : 



151*153 avenu* Jaan* Jaurès 
A 834-03.44 f 


•3307 AUBEftVILUEVIS Cédés 
Télax 212174 P 
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PROGRAMMES 


2 5 y ■' 


"ïX, V:MAX=X:LNG=V 


1 si bar ri er- es# 


+Faire un trou# 


de se déplacer# 


3 REM ++CASCADE++ <MZ 88 K> 

=; pp T MT 11 S" 

138 i.JHLL=67: B0X=239: BflLL=71 : MAX=850! LNG=6 

148 FRI MT "On change de paramétré " : G Ü SUE: 9 88 8 : I FR$= "N M THEH 1 58 
143 PR I NT : PR I NT : PR I MT 
1 45 I NF’IJT " Max i mum < < 688 > , Long ueu r 
1 58 D I MDRP < LNQ > : SC=53248 s PR I NT " S " 

160 REM #0n trace les murs# 

178 FÛRI=0TÜ24 
180 POKESC+ 1 #40 ? UlflLL 
1 90- PÜKESC+ 1 +48+39 , WALL 
280 N EX T I 
210 FOR I =8T039 
220 PÜKESC+24+40+ I , WALL 
238 NEXTIsREM +Faire 
248 F0RI=1T0MAX 
258 P=SC+ 1 NT < 1 080+RND < 1 > > 

268 FORJ=0TO3 

278 I FPEEK < P+J > = 8 T H E N P 0 K E P + J , BOX 
288 NEXT J :■ I 

298 FOR I = 1 T 038 : PÛKESC+ 1,0! NEXT I : REM 
388 REM+On envoie une nouvelle goutte# 

3 1 0 8=80+20 : D=48 : CLNG=LNG 
320 FOR I = 1 TOCLNG : DRP < I > =8 : NEXT I 

338 drp<::clng::*=s 

340 I FPEEK < S > < >8THEN660 
358 REM+T racer le début, et essayer 
368 POKES, BALL 

378 REM+D ''abord vers le bas# 

380 I FPEEK < 8+40 ) =8THEND=48 : G0T05 1 0 
398 NS=S+D : REM#Nouve lie pos i t i on# 

480 I FPEEK < NS > =0THEN5 1 0 

410 REM+On arrive a emplacement occupe# 

428 IFDO40THEN680 

430 REM+On vérifié a droite et a gauche# 

448 R=PEEK < 8+ 1 ') • L=F'EEK ( S- 1 > 

450 REM+Si on peut aller dans les deux sens , on choisit au hasard# 
460 IF>:R=0.:- + (L=0>THEND=SGN< . 5-RNDC 1 ) > : G0T0518 
470 I FR=0THEND= 1 : G0T05 1 8 
488 I FL=0THEND=- 1 : G0T05 1 0 

4 9 8 G U T U 6 8 8 ■ RE M + : U o i n c e ■> o n p a r t a s €■ 1 a 3 o u 1 1 S' e t o n e - s s- a y ■=■ €■ f i >_• v r e + 
580 REM+Nous bougeons de D# 

510 7L=DRP< 1 > s REM+Tout d -abord a la fin# 

528 I FTL< >0THENPOKETL , 0 : REM+On 1 a b .1 anch i t + 

538 REM#0n avance L tout# 

540 FOR 1=2 TOCLNG 
550 DRP <1-1 > =DRP < I > 

568 NEXTI 
570 DR F' ( CL N G > =8 
580 S=S+D : DRP ( CL N G > =8 
598 GOTO360 

600 REM+Coince Son essaye suivant# 

610 I F CLNG< =2THEN3 1 8 
620 CLNG=CLNG~ 1 
638 S=DRF' ( CLNG > 

640 IF8=0THEN660ï REM#Termine car on sort de 1 "écran# 

658 D=40s GOTO360! REM+Essayons de descendre# 

660 REM+F i n "on recommence# 

678 GETRi: IFR$=" "THEH670 
671 PRINT"B":RUN 
9008 REM+OUI ou NON# 

9810 GETR* 

9820 I F < R$= " 0 " > + < R$~ " N " > THENRETURN 
9038 GOTO9018 
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